﻿Imports System.Web.Services
Imports System.Web.Services.Protocols
Imports System.ComponentModel

<System.Web.Script.Services.ScriptService()> _
<System.Web.Services.WebService(Namespace:="http://www.openlightgroup.net/SeoMvc/ContentService/07/2009/")> _
<System.Web.Services.WebServiceBinding(ConformsTo:=WsiProfiles.BasicProfile1_1)> _
<ToolboxItem(False)> _
Public Class ContentService
    Inherits System.Web.Services.WebService

    <WebMethod()> _
    Public Function GetContent(ByVal pageName As String) As String



        Select Case pageName.ToLower
            Case "about"

                Return "About message from Webservice"


            Case "home"

                Return "Home message from Webservice"


            Case Else

                Return "Default message from Webservice"

        End Select

    End Function

End Class